package org.steven.crm.core.utils;

import com.google.zxing.BarcodeFormat;
import com.google.zxing.EncodeHintType;
import com.google.zxing.MultiFormatWriter;
import com.google.zxing.common.BitMatrix;
import com.google.zxing.qrcode.decoder.ErrorCorrectionLevel;
import sun.font.FontDesignMetrics;

import javax.imageio.ImageIO;
import java.awt.*;
import java.awt.geom.RoundRectangle2D;
import java.awt.image.BufferedImage;
import java.io.File;
import java.io.FileOutputStream;
import java.io.OutputStream;
import java.util.Hashtable;

/**
 * 二维码工具类
 * 
 */
public class QRCodeUtil {
	private static final String CHARSET = "utf-8";
	private static final String FORMAT_NAME = "PNG";
	// 二维码尺寸
	private static final int QRCODE_SIZE = 400;
	// LOGO宽度
	private static final int WIDTH = 80;
	// LOGO高度
	private static final int HEIGHT = 80;

	private static BufferedImage createImage(String content, String imgPath,
			boolean needCompress, int width0) throws Exception {
		Hashtable<EncodeHintType, Object> hints = new Hashtable<EncodeHintType, Object>();
		hints.put(EncodeHintType.ERROR_CORRECTION, ErrorCorrectionLevel.H);
		hints.put(EncodeHintType.CHARACTER_SET, CHARSET);
		hints.put(EncodeHintType.MARGIN, 0);
		BitMatrix bitMatrix = new MultiFormatWriter().encode(content,
				BarcodeFormat.QR_CODE, width0, width0, hints);
		int width = bitMatrix.getWidth();
		int height = bitMatrix.getHeight();
		BufferedImage image = new BufferedImage(width, height,
				BufferedImage.TYPE_INT_RGB);
		for (int x = 0; x < width; x++) {
			for (int y = 0; y < height; y++) {
				image.setRGB(x, y, bitMatrix.get(x, y) ? 0xFF000000
						: 0xFFFFFFFF);
			}
		}
		image.flush();
		if (imgPath == null || "".equals(imgPath)) {
			return image;
		}
		// 插入图片
		QRCodeUtil.insertImage(image, imgPath, needCompress);
		return image;
	}

	/**
	 * 插入LOGO
	 * 
	 * @param source
	 *            二维码图片
	 * @param imgPath
	 *            LOGO图片地址
	 * @param needCompress
	 *            是否压缩
	 * @throws Exception
	 */
	private static void insertImage(BufferedImage source, String imgPath,
			boolean needCompress) throws Exception {
		File file = new File(imgPath);
		if (!file.exists()) {
			System.err.println(""+imgPath+"   该文件不存在！");
			return;
		}
		Image src = ImageIO.read(new File(imgPath));
		int width = src.getWidth(null);
		int height = src.getHeight(null);
		if (needCompress) { // 压缩LOGO
			if (width > WIDTH) {
				width = WIDTH;
			}
			if (height > HEIGHT) {
				height = HEIGHT;
			}
			Image image = src.getScaledInstance(width, height,
					Image.SCALE_SMOOTH);
			BufferedImage tag = new BufferedImage(width, height,
					BufferedImage.TYPE_INT_RGB);
			Graphics g = tag.getGraphics();
			g.drawImage(image, 0, 0, null); // 绘制缩小后的图
			g.dispose();
			src = image;
		}
		// 插入LOGO
		Graphics2D graph = source.createGraphics();
		int x = (QRCODE_SIZE / 2 - width / 2);
		int y = (QRCODE_SIZE / 2 - height / 2) ;
		graph.drawImage(src, x, y, width, height, null);
		Shape shape = new RoundRectangle2D.Float(x, y, width, width, 6, 6);
		graph.setStroke(new BasicStroke(3f));
		graph.draw(shape);
		graph.dispose();
	}
	/**
	 * 生成二维码(内嵌LOGO)
	 * 
	 * @param content
	 *            内容
	 * @param imgPath
	 *            LOGO地址
	 * @param output
	 *            输出流
	 * @param needCompress
	 *            是否压缩LOGO
	 * @throws Exception
	 */
	public static void encode(String content, String imgPath,
			OutputStream output, boolean needCompress, int width0) throws Exception {
		BufferedImage image = QRCodeUtil.createImage(content, imgPath,
				needCompress, width0);
		ImageIO.write(image, FORMAT_NAME, output);
		image.flush();
	}

	/**
	 * 生成二维码
	 * 
	 * @param content
	 *            内容
	 * @param output
	 *            输出流
	 * @throws Exception
	 */
	public static void encode(String content, OutputStream output, int width0)
			throws Exception {
		QRCodeUtil.encode(content, null, output, false, width0);
	}
	
	public static void encode(String content, String imagePath, String imageName, int width)
			throws Exception {
		File dir = new File(imagePath);
		if (!dir.exists()) {
			dir.mkdirs();
		}
		
		File qrCodeFile = new File(imagePath + imageName);
		if (qrCodeFile.exists()) {
			return;
		}
		
		FileOutputStream output = null;
		try {
			output = new FileOutputStream(qrCodeFile);
			QRCodeUtil.encode(content, null, output, false, width);
		} finally {
			if (output != null) {
				output.flush();
				output.close();
			}
		}
	}
	
	public static int getWordWidth(Font font, String content) {
		FontDesignMetrics metrics = FontDesignMetrics.getMetrics(font);
		int width = 0;
		for (int i = 0; i < content.length(); i++) {
			width += metrics.charWidth(content.charAt(i));
		}
		return width;
	}
	
	private static void encodeWithLog(String content, String imagePath, String imageName, int width, String logoImage)
			throws Exception {
		File dir = new File(imagePath);
		if (!dir.exists()) {
			dir.mkdirs();
		}
		
		File qrCodeFile = new File(imagePath + imageName);
		if (qrCodeFile.exists()) {
			return;
		}
		
		FileOutputStream output = null;
		try {
			output = new FileOutputStream(qrCodeFile);
			QRCodeUtil.encode(content, logoImage, output, true, width);
		} finally {
			if (output != null) {
				output.flush();
				output.close();
			}
		}
	}
}
